clear all;
%% plot 
load('result.mat')

fig=figure('color', [1 1 1 ], 'Position',[200 20 800 320]);

handle=subplot(1,2,1);
axis square
plot(d_credit, frac_credit.*100, '-b' , 'LineWidth', 2 );

title( 'A. Frac. of households with loans', 'FontSize',15,'Interpreter','Latex');
xlabel('distance from nearest bank branch (min)', 'FontSize',12,'Interpreter','Latex');
ylabel('frac. of households with loans (\%)', 'FontSize',12,'Interpreter','Latex');

xlim([0,30]);
% xticks(0:2:10);
ylim([0,4.5]);
% yticks(1.0:0.3:2.5);
set(gca,'FontSize',12);
get(handle,'position');


handle=subplot(1,2,2);
axis square
plot(d_deposit, dc_ratio.*100, '-b' , 'LineWidth', 2 );

title( 'B. Deposit-cash ratio', 'FontSize',15,'Interpreter','Latex');
xlabel('distance from nearest bank branch (min)', 'FontSize',12,'Interpreter','Latex');
ylabel('deposit-cash ratio (\%)', 'FontSize',12,'Interpreter','Latex');

xlim([0,50]);
% xticks(0:2:10);
ylim([0,65]);
yticks(0:20:60);
set(gca,'FontSize',12);
get(handle,'position');
